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X86-to Tapestry transition exception handler 

//This handler is entered under the following conditions: 
// 1 . An x86 caller invokes a native function 
// 2. An x86 function returns to a native caller 

// 3. x86 software returns to or resumes an intermpted native function following 
// an extemal asynchronous interrupt, a processor exception, or a context switch 
^321 

dispatch on tiie two least-significant bits of ttie destination address { 
caseW // calling a native subprogram 

// copy linkage and stack frame infomfiation and call parameters from the memory 
// stack to the analogous Tapestry registers ««<3 
LR-^[SP++1 // set up linkage register -^'^^^^^ 
AP -^SP // address of first argument-^"^^^ 325 

SP SP - 8 // allocate return transfer argument area onv 
SP SP & (-32) // round the stack pointer down to a 0 mod 32 boundary ^ 
XD 0 // inform callee tiiat caller uses X86 calling conventions 328 

case "01" // resuming an X86 thread suspended during execution of a native routine 
if the redundant copies of the save slot number in EAX and EDX do not match or if "1 07-1 
the redundant copies of the timestamp in EBX:ECX and ESLEDI do not match { J 
// some fonn of bug or thread conruption has been detected 
goto TAPESTRY_CRASH_SYSTEM( thread-corruption-error-code ) 372 

save the EBX:ECX timestamp in a 64-bit exception handler temporary register "l^yg 

(this will not be overwritten during restoration of the full native context) J 
use save slot number in EAX to locate actual save slot storage-^374 
restore full entire native context (includes new values for all x86 registers) -^.375 
if save slot's timestamp does not match the saved timestamp { "^376 
// save slot has been reallocated; save slot exhaustion has been detected 
goto TAPESTRY_CRASH_SYSTEM( save-slot-ovenwritten-error-code )->^277 

free the save slot — ^^^^ 

case"10" // retuming from X86 callee to native caller, result already in registers 

RV0<63:32> -^edx<31:00> // in case result is 64 bits 333 

convert the FP top-of-stack value from 80 bit X86 form to 64-bit fomi in RVDP ^^.^334 
SP -^ESI // restore SP from time of call 337 

case"11" // retuming from X86 callee to native caller, load large result from memory ^ 
RV0..RV3 load 32 bytes from [ESI-32] // (guaranteed naturally aligned) -\.oon 
SP ESI // restore SP from time of call ^^^^ 

EPC^EPC & -4 // reset the two low-order bits to zero-Xooc 



^332 



^329 
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340 

Tapestry-to-X86 transition exception handler 

// This handler is entered under the following conditions: 
// 1 . a native caller invokes an x86 function . r . • 

// 2. a native function returns to an x86 caller 
switch on XD<3:0> { 

XD_RET_FP: // result type is floating point 

FO/FI-^FINFLATE.de(RVDP) //X86 FP results are 80 bits 
SP-^ from RXA save // discard RXA, pad, args 

FPCW-*-image after FINIT & push // FP stack has 1 entry 
goto EXIT 

XD_RET_WRITEBACK: // store result to @RVA. leave RVA in eax 

RVA-*-from RXA save // address of result area 

copy decode(XD<8:4>) bytes from RV0..RV3 to [RVA] 342 
eax-^ RVA // X86 expects RVA in eax 

SP-»-from RXA save // discard RXA, pad, args 

FPCW-^image after FINIT // FP stack is empty 

goto EXIT 

XD_RET_SCALAR: // result in eax:eda 

edx<31 :00> eax<63:32> // in case result is 64 bits 
SP-^from RXA save // discard RXA, pad, args 

FPCW-^image after FINIT // FP stack is empty 

goto EXIT . 

XD_CALL_HIDDEN_TEMP: // allocate 32 byte aligned hidden temD^343 
esi-^SP // stack cut back on return 

SP-^ SP - 32 // allocate max size temp 1 344 

RVA-^SP //RVA consumed later by RR J 

LR<1:0>-^"ir //flag address for retum & reload-^ 

gotoCALL.COMMON 345 

default: // remaining XD_CALL_xxx encodings 

esi^SP // stack cut back on retum ^ 

LR<1:0>-^"10" //flag address for retum 343 

CALLCOMMON: 347 346 

interpret XD to push and/or reposition args 
[..SP]-»- LR // push LR as retum address ' 

EXIT: !► 348 

setup emulator context and profiling ring buffer pointer 

} ^-349 

RFE-^ //to original target 

} 

FIG. 31 



350 
/ 

interrupt/exception handler of Tapestry operating system: ' . 

// Control vectors here when a synchronous exception or asynchronous interrupt is to be 
// exported to / manifested in an x86 machine. 

// The intermpt is directed to something within the virtual X86, and thus there is a possibility 
// that the X86 operating system will context switch. So we need to distinguish two cases: 
// either the running process has only X86 state that is relevant to save, or 
// there is extended state that must be saved and associated with the cun-ent machine context 
// (e.g., extended state in a Tapestry library call in behalf of a process managed by X86 OS) 
if execution was interrupted in the converter - EPC.ISA == X86 { 1 
// no dependence on extended/native state possible, hence no need to save any f-SSI 
goto EM86_Deliver_lnteniipt( inten^upt-byte ) j 
}eIseifEPC.Taxi_Active{ 

// ATaxi translated version of some X86 code was running. Taxi will rollback to an 
//x86 instruction boundary. Then, if the rollback was induced by an asynchronous external 
// interrupt, Taxi will deliver the appropriate x86 interrupt. Else, the rollback was induced 
// by a synchronous event so Taxi will resume execution in the converter, retriggering the 
// exception but this time with EPC.ISA == X86 
goto TAXi_Rollback( asynchronous-flag, interrupt-byte ) 
}elseifEPC.EM86{ 

// The emulator has been interrupted. The emulator is coded to allow for such 
// conditions and permits re-entry during long running routines (e.g. far call through a gate) V, 354 
// to deliver external intermpts 
goto EM86_DeliverJnterrupt( interrupt-byte ) 



>353 



) else { 



J 



//This is the most difficult case - the machine was executing native Tapestry code on 
// behalf of an X86 thread. The X86 operating system may context switch. We must save 
// all native state and be able to locate it again when the x86 thread is resumed. 
^361 

allocate a free save slot; if unavailable free the save slot with oldest timestamp and try again 
save the entire native state (both the X86 and the extended state) 1 
save the X86 EIP in the save slot J 363 

overwrite the two low-order bits of EPC with "01" (will become X86 interrupt EIP) )>360 
store the 64-bit timestamp in the save slot, in the X86 EBX:ECX register pair (and, \>iOA 

for further security, store a redundant copy in the X86 ESLEDI register pair) j "^"^ 
store the a number of the allocated save slot in the X86 EAX register (and, again for'l 

further security, store a redundant copy in the X86 EDX register) j 
goto EM86_Deliver_lnterrupt( interrupt-byte ) >. 

^369 
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typedef struct { 
save_slot_t * 
save_slot_t * 
unsigned int64 
unsigned int64 
unsigned int64 

timestampj 
int 

boolean 
} save_slot_t; 



newer, // pointer to next-most-recently-ailocated save slot' 
olden // pointer to next-older save slot 

epc; // saved exception PC/IP 

pew; // saved exception PCW (program control word) 

registers[63]; // save the 63 writeable general registers 

// other words of Tapestry context 
timestamp; // timestamp to detect buffer overrun -n 
save_slot_ID; //ID number of the save slot ^ 
save slotjsjull; // full / empty flag -n 357 

^359 



-358 



•379c 



-356 



save_slot_t* 
save slot t* 



save_slot_head; 
save_slot_tail; 



// pointer to the head of the queue ^ 
// pointer to the tail of the queue -n 379a 

^379b 



system initialization 

reserve several pages of unpaged memory for save slots 
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INTERPRET XD: 342 
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-LOADFPCW 

SP — [SP] // POP RAAND ARGS [V 



XD CONTAINS CALL-DESCRIPTOR: 
ESI— SP 

INTERPRET XD, REPOSITION ARGS 
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PUSH LRASRA(RETADDR) 




^320 
HANDLER: x86 TO RISC 



EPC<1:0>==00: 
LR — [SP] 
SP — SP + 4 
AP — SP 
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SP — SP&(-32) 
XD — 0 
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REUSE EVENTCODE 
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REUSEEVENTCODE 
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PROBE EXCEPTION FAILED, RELOAD PROBE lER 
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aUSH EVENT 
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